
        integer KCLOUD
        PARAMETER (KCLOUD=42)

        real cld_hts(kcloud)
